library(data.table)
Nouveau=T
U0=fread("C:/wamp64/www/utilisateurs_prev.txt")
U1=fread("C:/wamp64/www/utilisateurs.txt")
test=match(U1$identifiant,U0$identifiant)
if(Nouveau)
{
Unouveau=subset(U1,!(U1$identifiant %in% U0$identifiant))
}else{
Unouveau=U1
}
Unouveau$instruction=paste("INVITE vigie-chiro",Unouveau$email)
fwrite(Unouveau,"AInscrire.csv",sep=";")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.